This AppleScript™ creates some text in a Microsoft Word™ document and places the BarCode equivalent graphic into a picture box on the same line:
tell application "Microsoft Word"
activate
do script "FileNew .Template = \"Normal\", .NewTemplate = 0"
set contents of selection to "5001234567890"
do script "CharLeft 13, 1"
copy
do script "LineDown 2"
set contents of selection to " is represented by "
end tell
tell application "Scorpion BarCode"
activate
macro "MENU Encode EAN-13"
macro "CLCK Field 1"
macro "MENU Edit Paste Data"
macro "BUTN Press Clip"
macro "BUTN Press OK"
macro "MENU File Quit"
end tell
tell application "Microsoft Word"
activate
paste
end tell
The script was created using the ScriptEditor™ program supplied with AppleScript™ system software. The Scorpion BarCode software supports the Script Recording feature within ScriptEditor™ enabling you to create scripts easily and quickly!
Please note that references to various known trademarks or registered trademarks of Apple Computer Inc and Microsoft Corporation have been made in this document. Such references do not imply any endorsement of, or other affiliations with, Scorpion Research Limited or vice versa. The reference to the known trademarks or registered trademarks names is in an editorial fashion only, and to the benefit of the trademark holder and owner, with no intention of infringement of the trademark.